home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 4 / FM Towns Free Software Collection 4 - Disc 2.iso / heat_tst / keymacro.cfg < prev    next >
Text File  |  1991-10-19  |  3KB  |  193 lines
  1. /*******************************************************************
  2. /*
  3. /*    キーカスタマイズによって直接キーに割り当て可能なマクロ
  4. /*
  5. /********************************************************************
  6.  
  7.  
  8. KEYMACRO_01 {
  9. }
  10.  
  11. KEYMACRO_02 {
  12. }
  13.  
  14. KEYMACRO_03 {
  15. }
  16.  
  17. KEYMACRO_04 {
  18. }
  19.  
  20. KEYMACRO_05 {
  21. }
  22.  
  23. KEYMACRO_06 {
  24. }
  25.  
  26. KEYMACRO_07 {
  27. }
  28.  
  29. KEYMACRO_08 {
  30. }
  31.  
  32. KEYMACRO_09 {
  33. }
  34.  
  35.  
  36. KEYMACRO_10 {
  37. }
  38.  
  39. KEYMACRO_11 {
  40. }
  41.  
  42. KEYMACRO_12 {
  43. }
  44.  
  45. KEYMACRO_13 {
  46.     if ( func_help )
  47.     {   cfg_load("funchelp.cfg")
  48.         func_help = 1;
  49.     }
  50.     FUNC_help()
  51. }
  52.  
  53. KEYMACRO_14 {
  54. }
  55.  
  56. KEYMACRO_15 {
  57. }
  58.  
  59. KEYMACRO_16 {
  60.     mos_get("sw","x","y")
  61.     menu2_select(x,y,"外部まくろこまんど，お～とろ～だぁ",
  62.         "C:eupChk  EUP 音色データファイル名を調べるよン♪",
  63.         "E:Eupcnv  出力ポートコンバータ（HE386 のバグのため…）"
  64.         " ",
  65.         "T:Tiff    TIFF画像データを表示するよン♪",
  66.         "S:Sndplay SND音声データを再生するよン♪"
  67.     )
  68.     if ( VAL < 0 ) { return }
  69.     if ( VAL = 0 )
  70.     {    cfg_load( "eupchk.cfg")
  71.     } else if ( VAL = 1 )
  72.     {    cfg_load("eupcnv.cfg")
  73.     } else if ( VAL = 3 )
  74.     {    cfg_load("tiff.cfg")
  75.     } else if ( VAL = 4 )
  76.     {    cfg_load("sndplay.cfg")
  77.     }
  78.     main()
  79. }
  80.  
  81. KEYMACRO_17 {
  82. #    TRK = 0;
  83. #    SND("eup_init")
  84. #    SND("eup_port_set"     , TRK,0)
  85. #    SND("eup_midi_ch_set"  , TRK,0)
  86. #    SND("eup_transpose_set", TRK,0)
  87. #    SND("eup_bias_set"     , TRK,0)
  88. #    SND("midi_write"       , 0  , "B0 00 08 B0 20 00",6)
  89. #    SND("midi_write"       , 0  , "C0 3E",2)
  90. #    RET = VAL;
  91. #    wind_close()
  92. #    wind_open()
  93. #    echo("midi_write \(RET)\n")
  94. #    wait(10)
  95. #    wind_close()
  96. }
  97.  
  98. KEYMACRO_18 {
  99. }
  100.  
  101. KEYMACRO_19 {
  102.     mosget("sw","x","y")
  103.     FILE = ""
  104.     menu2_select(x,y,"よく編集するファイル"
  105.         "A:Dial.txt ",
  106.         "B:Prof.dat ",
  107.         "K:KeyMacro.cfg"
  108.     )
  109.     if ( VAL = 0 )
  110.     {    FILE = "K:\\HC\\EDIT\\WORK\\Dial.txt"
  111.     } else if ( VAL = 1 )
  112.     {    FILE = "J:\\LOG\\NIFTY\\Prof.dat"
  113.     } else if ( VAL = 2 )
  114.     {    FILE = "H:\\T_APL\\PRIDE\\KeyMacro.cfg"
  115.     }
  116.     if ( FILE ! "" )
  117.     {    text_chg(FILE)
  118.         text_edit()
  119.     }
  120. }
  121.  
  122. KEYMACRO_20 {
  123.     wind_close()
  124.     wind_init()
  125.     wind_open2("拡張ファクションキー説明")
  126.     echo("[PF13] ガイダンス表示\n")
  127.     echo("[PF16] 外部マクロコマンド・オートローダー\n")
  128.     echo("[PF17] MIDI 制御\n")
  129.     echo("[PF19] よく編集するファイル\n")
  130.     echo("[PF20] この説明だよン♪\n")
  131.     wait(30)
  132.     wind_close()
  133. }
  134.  
  135. KEYMACRO_21 {
  136. }
  137.  
  138. KEYMACRO_22 {
  139. }
  140.  
  141. KEYMACRO_23 {
  142. }
  143.  
  144. KEYMACRO_24 {
  145. }
  146.  
  147. KEYMACRO_25 {
  148. }
  149.  
  150. KEYMACRO_26 {
  151. }
  152.  
  153. KEYMACRO_27 {
  154. }
  155.  
  156. KEYMACRO_28 {
  157. }
  158.  
  159. KEYMACRO_29 {
  160. }
  161.  
  162.  
  163. KEYMACRO_30 {
  164. }
  165.  
  166. KEYMACRO_31 {
  167. }
  168.  
  169. KEYMACRO_32 {
  170. }
  171.  
  172. KEYMACRO_33 {
  173. }
  174.  
  175. KEYMACRO_34 {
  176. }
  177.  
  178. KEYMACRO_35 {
  179. }
  180.  
  181. KEYMACRO_36 {
  182. }
  183.  
  184. KEYMACRO_37 {
  185. }
  186.  
  187. KEYMACRO_38 {
  188. }
  189.  
  190. KEYMACRO_39 {
  191. }
  192.  
  193.